;Edit *.MNU files
;
(defun c:edmenu ( / )
  (if check_for_doslib nil (load "check_for_doslib" "\nFile CHECK_FOR_DOSLIB.LSP not loaded! "))
  (check_for_doslib)
  (IF dos_sysdir
    (SETQ dos_root_drive (CAR(dos_splitpath(dos_sysdir))))
    (SETQ dos_root_drive "C:")
  )
  (if (eq (getenv "computername") "HCF_PRF")
    (setq edfil (getfiled "Edit AutoCAD Menu File" (STRCAT dos_root_drive "Documents and Settings\\cooper\\Application Data\\Autodesk\\Autodesk Land Desktop 2004\\R16.0\\enu\\support\\") "mns;mnu" 4))
    (setq edfil (getfiled "Edit AutoCAD Menu File" (STRCAT dos_root_drive "Documents and Settings\\Cooper\\Application Data\\Autodesk\\Autodesk Land Desktop 2004\\R16.0\\enu\\support\\") "mns;mnu" 4))
  )
  (setq edstr (strcat "notepad.exe " edfil))
  (command ".START" edstr)
);defun
